VB中的Sub过程没有返回值和Function区别？最好能举个实列

'以下为 command的单击事件 Private Sub Command1_Click() Dim num As Integer Randomize num = Int(Rnd * 10 + 1) Print num If num > 6 Then num = num + 2 Else num = num - 2 End If Print num End Sub '然后 将以上代码 放入sub 中 Private Sub Command1_Click() Dim num As Integer Randomize num = Int(Rnd * 10 + 1) Print num test (num) End Sub Sub test(s As Integer) If s > 6 Then s = s + 2 Else s = s - 2 End If Print s End Sub '再试着用 function Private Sub Command1_Click() Dim num As Integer Randomize num = Int(Rnd * 10 + 1) Print num Print test(num) End Sub Function test(s As Integer) If s > 6 Then s = s + 2 Else s = s - 2 End If test = s '这里就是返回的值 End Function '简单说下 sub 和 function 的区别 '老板让你去做某事 你没有汇报结果 就是 sub '同上 你汇报结果给老板了 就是 function

相关问题

查看更多问题>>